#include "stdafx.h"
#pragma hdrstop

#include "Blender_Screen_SET.h"

#define		VER_2_oBlendCount	7
#define		VER_4_oBlendCount	9
#define		VER_5_oBlendCount	10

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CBlender_Screen_SET::CBlender_Screen_SET()
{
	description.CLS		= B_SCREEN_SET;
	description.version	= 4;
	oBlend.Count		= VER_4_oBlendCount;
	oBlend.IDselected	= 0;
	oAREF.value			= 32;
	oAREF.min			= 0;
	oAREF.max			= 255;
	oZTest.value		= FALSE;
	oZWrite.value		= FALSE;
	oLighting.value		= FALSE;
	oFog.value			= FALSE;
	oClamp.value		= TRUE;
}

CBlender_Screen_SET::~CBlender_Screen_SET()
{
	
}

void	CBlender_Screen_SET::Save	( IWriter& fs	)
{
	IBlender::Save	(fs);

	// Blend mode
	xrP_TOKEN::Item	I;
	xrPWRITE_PROP	(fs,"Blending",	xrPID_TOKEN,     oBlend);
	I.ID = 0; strcpy_s(I.str,"SET");			fs.w		(&I,sizeof(I));
	I.ID = 1; strcpy_s(I.str,"BLEND");		fs.w		(&I,sizeof(I));
	I.ID = 2; strcpy_s(I.str,"ADD");			fs.w		(&I,sizeof(I));
	I.ID = 3; strcpy_s(I.str,"MUL");			fs.w		(&I,sizeof(I));
	I.ID = 4; strcpy_s(I.str,"MUL_2X");		fs.w		(&I,sizeof(I));
	I.ID = 5; strcpy_s(I.str,"ALPHA-ADD");	fs.w		(&I,sizeof(I));
	I.ID = 6; strcpy_s(I.str,"MUL_2X (B^D)");	fs.w		(&I,sizeof(I));
	I.ID = 7; strcpy_s(I.str,"SET (2r)");		fs.w		(&I,sizeof(I));
	I.ID = 8; strcpy_s(I.str,"BLEND (2r)");	fs.w		(&I,sizeof(I));
	I.ID = 9; strcpy_s(I.str,"BLEND (4r)");	fs.w		(&I,sizeof(I));
	
	// Params
	xrPWRITE_PROP		(fs,"Texture clamp",xrPID_BOOL,		oClamp);
	xrPWRITE_PROP		(fs,"Alpha ref",	xrPID_INTEGER,	oAREF);
	xrPWRITE_PROP		(fs,"Z-test",		xrPID_BOOL,		oZTest);
	xrPWRITE_PROP		(fs,"Z-write",		xrPID_BOOL,		oZWrite);
	xrPWRITE_PROP		(fs,"Lighting",		xrPID_BOOL,		oLighting);
	xrPWRITE_PROP		(fs,"Fog",			xrPID_BOOL,		oFog);
}

void	CBlender_Screen_SET::Load	( IReader& fs, u16 version)
{
	IBlender::Load		(fs,version);

	switch (version)	{
	case 2:
		xrPREAD_PROP		(fs,xrPID_TOKEN,		oBlend);	oBlend.Count =   VER_5_oBlendCount;
		xrPREAD_PROP		(fs,xrPID_INTEGER,		oAREF);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZTest);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZWrite);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oLighting);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oFog);
		break;
	case 3:
		xrPREAD_PROP		(fs,xrPID_TOKEN,		oBlend);	oBlend.Count =   VER_5_oBlendCount;
		xrPREAD_PROP		(fs,xrPID_BOOL,			oClamp);
		xrPREAD_PROP		(fs,xrPID_INTEGER,		oAREF);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZTest);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZWrite);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oLighting);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oFog);
		break;
	default:
		xrPREAD_PROP		(fs,xrPID_TOKEN,		oBlend);	oBlend.Count =   VER_5_oBlendCount;
		xrPREAD_PROP		(fs,xrPID_BOOL,			oClamp);
		xrPREAD_PROP		(fs,xrPID_INTEGER,		oAREF);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZTest);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oZWrite);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oLighting);
		xrPREAD_PROP		(fs,xrPID_BOOL,			oFog);
		break;
	}
}

#if defined(USE_OGL)

void	CBlender_Screen_SET::Compile	(CBlender_Compile& C)
{
	IBlender::Compile		(C);
	//C.r_Pass			("stub_notransform_t", "Blender_Screen_SET", false);

	if (oBlend.IDselected==6)
	{
		// Usually for wallmarks
		C.r_Pass			("stub_notransform_t", "stub_default_ma", false);

		VERIFY(C.L_textures.size()>0);
		C.r_Sampler("s_base", C.L_textures[0], false, D3DTADDRESS_CLAMP);
	} 
	else 
	{
		if (9==oBlend.IDselected)
		{
			// 4x R
			C.r_Pass			("stub_notransform_t_m4", "stub_default", false);
			//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE4X,	D3DTA_DIFFUSE);
			//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
		} 
		else 
		{
			if ((7==oBlend.IDselected) || (8==oBlend.IDselected))
			{
				// 2x R
				C.r_Pass			("stub_notransform_t_m2", "stub_default", false);
				//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE2X,	D3DTA_DIFFUSE);
				//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
			} 
			else 
			{
				// 1x R
				C.r_Pass			("stub_notransform_t", "stub_default", false);
				//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
				//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
			}
		}
		//C.Stage_Texture		(oT_Name);
		//C.Stage_Matrix		(oT_xform,	0);
		//C.Stage_Constant	("$null");
		//C.StageEnd			();
		VERIFY(C.L_textures.size()>0);
		C.r_Sampler("s_base", C.L_textures[0], false, D3DTADDRESS_CLAMP);
	}

	C.PassSET_ZB		(oZTest.value,oZWrite.value);

	switch (oBlend.IDselected)
	{
	case 0:	// SET
		C.PassSET_Blend	(FALSE,	D3DBLEND_ONE,D3DBLEND_ZERO,				FALSE,0);
		break;
	case 1: // BLEND
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	case 2:	// ADD
		C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ONE,				FALSE,oAREF.value);
		break;
	case 3:	// MUL
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_ZERO,		FALSE,oAREF.value);
		break;
	case 4:	// MUL_2X
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
		break;
	case 5:	// ALPHA-ADD
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_ONE,			TRUE,oAREF.value);
		break;
	case 6:	// MUL_2X + A-test
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
		break;
	case 7:	// SET (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ZERO,				TRUE,0);
		break;
	case 8: // BLEND (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	case 9: // BLEND (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	}
	C.PassSET_LightFog	(oLighting.value,oFog.value);

	C.r_End				();
}

#elif defined(USE_DX10) // USE_OGL

void	CBlender_Screen_SET::Compile	(CBlender_Compile& C)
{
	IBlender::Compile		(C);
	//C.r_Pass			("stub_notransform_t", "Blender_Screen_SET", false);

	if (oBlend.IDselected==6)
	{
		// Usually for wallmarks
		C.r_Pass			("stub_notransform_t", "stub_default_ma", false);

		VERIFY(C.L_textures.size()>0);
		C.r_dx10Texture			("s_base",	C.L_textures[0]	);
		int iSmp = C.r_dx10Sampler("smp_base");
		if (oClamp.value)
			C.i_dx10Address(iSmp, D3DTADDRESS_CLAMP);
		
	} 
	else 
	{
		if (9==oBlend.IDselected)
		{
			// 4x R
			C.r_Pass			("stub_notransform_t_m4", "stub_default", false);
			//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE4X,	D3DTA_DIFFUSE);
			//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
		} 
		else 
		{
			if ((7==oBlend.IDselected) || (8==oBlend.IDselected))
			{
				// 2x R
				C.r_Pass			("stub_notransform_t_m2", "stub_default", false);
				//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE2X,	D3DTA_DIFFUSE);
				//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
			} 
			else 
			{
				// 1x R
				C.r_Pass			("stub_notransform_t", "stub_default", false);
				//C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
				//C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
			}
		}
		//C.Stage_Texture		(oT_Name);
		//C.Stage_Matrix		(oT_xform,	0);
		//C.Stage_Constant	("$null");
		//C.StageEnd			();
		VERIFY(C.L_textures.size()>0);
		C.r_dx10Texture			("s_base",	C.L_textures[0]	);
		int iSmp = C.r_dx10Sampler("smp_base");
		if ( (oClamp.value) && (iSmp != u32(-1)) )
			C.i_dx10Address(iSmp, D3DTADDRESS_CLAMP);
	}

	C.PassSET_ZB		(oZTest.value,oZWrite.value);

	switch (oBlend.IDselected)
	{
	case 0:	// SET
		C.PassSET_Blend	(FALSE,	D3DBLEND_ONE,D3DBLEND_ZERO,				FALSE,0);
		break;
	case 1: // BLEND
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	case 2:	// ADD
		C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ONE,				FALSE,oAREF.value);
		break;
	case 3:	// MUL
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_ZERO,		FALSE,oAREF.value);
		break;
	case 4:	// MUL_2X
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
		break;
	case 5:	// ALPHA-ADD
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_ONE,			TRUE,oAREF.value);
		break;
	case 6:	// MUL_2X + A-test
		C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
		break;
	case 7:	// SET (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ZERO,				TRUE,0);
		break;
	case 8: // BLEND (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	case 9: // BLEND (2r)
		C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
		break;
	}
	C.PassSET_LightFog	(oLighting.value,oFog.value);

	C.r_End				();
}

#else	//	USE_DX10

void	CBlender_Screen_SET::Compile	(CBlender_Compile& C)
{
	IBlender::Compile		(C);
	C.PassBegin		();
	{
		C.PassSET_ZB		(oZTest.value,oZWrite.value);
		switch (oBlend.IDselected)
		{
		case 0:	// SET
			C.PassSET_Blend	(FALSE,	D3DBLEND_ONE,D3DBLEND_ZERO,				FALSE,0);
			break;
		case 1: // BLEND
			C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
			break;
		case 2:	// ADD
			C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ONE,				FALSE,oAREF.value);
			break;
		case 3:	// MUL
			C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_ZERO,		FALSE,oAREF.value);
			break;
		case 4:	// MUL_2X
			C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
			break;
		case 5:	// ALPHA-ADD
			C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_ONE,			TRUE,oAREF.value);
			break;
		case 6:	// MUL_2X + A-test
			C.PassSET_Blend	(TRUE,	D3DBLEND_DESTCOLOR,D3DBLEND_SRCCOLOR,	FALSE,oAREF.value);
			break;
		case 7:	// SET (2r)
			C.PassSET_Blend	(TRUE,	D3DBLEND_ONE,D3DBLEND_ZERO,				TRUE,0);
			break;
		case 8: // BLEND (2r)
			C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
			break;
		case 9: // BLEND (2r)
			C.PassSET_Blend	(TRUE,	D3DBLEND_SRCALPHA,D3DBLEND_INVSRCALPHA,	TRUE,oAREF.value);
			break;
		}
		C.PassSET_LightFog	(oLighting.value,oFog.value);
		// C.PassSET_LightFog	(FALSE,FALSE);

		if (oBlend.IDselected==6)	
		{
			// Usually for wallmarks
			C.StageBegin		();
			C.StageSET_Address	(oClamp.value?D3DTADDRESS_CLAMP:D3DTADDRESS_WRAP);
			C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
			C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
			C.Stage_Texture		(oT_Name);
			C.Stage_Matrix		("$null",0);
			C.Stage_Constant	("$null");
			C.StageEnd			();

			C.StageBegin		();
			C.StageSET_Address	(oClamp.value?D3DTADDRESS_CLAMP:D3DTADDRESS_WRAP);
			C.StageSET_Color	(D3DTA_DIFFUSE,	  D3DTOP_BLENDDIFFUSEALPHA,	D3DTA_CURRENT);
			C.StageSET_Alpha	(D3DTA_DIFFUSE,	  D3DTOP_MODULATE,			D3DTA_CURRENT);
			C.Stage_Texture		("$null");
			C.Stage_Matrix		("$null",	0);
			C.Stage_Constant	("$null");
			C.StageEnd			();
		} else {
			C.StageBegin		();
			C.StageSET_Address	(oClamp.value?D3DTADDRESS_CLAMP:D3DTADDRESS_WRAP);
			if (9==oBlend.IDselected)
			{
				// 4x R
				C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE4X,	D3DTA_DIFFUSE);
				C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
			} else {
				if ((7==oBlend.IDselected) || (8==oBlend.IDselected))
				{
					// 2x R
					C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE2X,	D3DTA_DIFFUSE);
					C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_SELECTARG1,	D3DTA_DIFFUSE);
				} else {
					// 1x R
					C.StageSET_Color	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
					C.StageSET_Alpha	(D3DTA_TEXTURE,	  D3DTOP_MODULATE,		D3DTA_DIFFUSE);
				}
			}
			C.Stage_Texture		(oT_Name);
			C.Stage_Matrix		(oT_xform,	0);
			C.Stage_Constant	("$null");
			C.StageEnd			();
		}
	}
	C.PassEnd			();
}
#endif	//	USE_DX10